home *** CD-ROM | disk | FTP | other *** search

---

/ Space & Astronomy / Space and Astronomy (October 1993).iso / pc / programs / mac / hyprspcm.hqx / Hyper-Space Mathematics / BMAP_19211.png

< prev

next >

Portable Network Graphic  |  1993-02-04  |  3KB  |  512x342  |  1-bit (2 colors)

Labels: text | font | screenshot | number
OCR: 170 Y(J) = (X(J-1) + X(J) + X (J JRUN +1)) / 3 J X(J) X'(J),N=1 X'(J), N=2 180 Y%= 10*(Y(J) + 0.05):Y(J) = 1 2 Y96/ 10 2 7 6.3 190 NEXT J 3 10 7.7 7.2 200 FOR J =3 TO 18 4 6 9 9.6 210 Z(J) = (X(J- 2) + X(J - 1) + 5 11 10.3 11.8 X(J) + X(J + 1) + X( J + 2)) / 6 14 14.3 13.6 5 7 18 17 15.6 220 Z% = 10 * (Z(J) + 0.05) : Z(J) = 8 19 17.7 16.8 Z9%ł10 9 16 17.3 18 230 NEXT J 10 17 17.7 18.4 240 PRINT "J"; : HTAB 10: PRINT " 11 20 19 18.2 X(J)"; 12 20 19.3 18.8

---